← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 15:33:55 2022
Reported on Wed Dec 14 15:40:04 2022

Filename(eval 266)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 168 statements in 502µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
1411235µs1.21msJSON::Schema::Modern::Document::::_set_metaschema_uri JSON::Schema::Modern::Document::_set_metaschema_uri
11112µs30µsJSON::Schema::Modern::Document::::BEGIN@7.118 JSON::Schema::Modern::Document::BEGIN@7.118
1118µs20µsMethod::Generate::Accessor::_Generated::::BEGIN@39.120Method::Generate::Accessor::_Generated::BEGIN@39.120
1115µs5µsMethod::Generate::Accessor::_Generated::::BEGIN@12.119Method::Generate::Accessor::_Generated::BEGIN@12.119
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
221µs my $coerce_for_metaschema_5furi = ${$_[1]->{"\$coerce_for_metaschema_5furi"}};
310s my $isa_check_for_metaschema_5furi = ${$_[1]->{"\$isa_check_for_metaschema_5furi"}};
411µs my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
510s my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
6 package JSON::Schema::Modern::Document;
7250µs248µs
# spent 30µs (12+18) within JSON::Schema::Modern::Document::BEGIN@7.118 which was called: # once (12µs+18µs) by Sub::Quote::_clean_eval at line 7
no warnings 'closure';
# spent 30µs making 1 call to JSON::Schema::Modern::Document::BEGIN@7.118 # spent 18µs making 1 call to warnings::unimport
8
# spent 1.21ms (235µs+978µs) within JSON::Schema::Modern::Document::_set_metaschema_uri which was called 14 times, avg 87µs/call: # 14 times (235µs+978µs) by JSON::Schema::Modern::Document::traverse at line 192 of JSON/Schema/Modern/Document.pm, avg 87µs/call
sub _set_metaschema_uri {
9 ($_QUOTED,$_UNQUOTED) if 0;
10# BEGIN quote_sub PRELUDE
11package Method::Generate::Accessor::_Generated;
12
# spent 5µs within Method::Generate::Accessor::_Generated::BEGIN@12.119 which was called: # once (5µs+0s) by Sub::Quote::_clean_eval at line 17
BEGIN {
1310s $^H = 1762;
1410s ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1514µs %^H = (
16 );
17178µs15µs}
18# END quote_sub PRELUDE
192827µsscalar do { my $value = do {
201441µs local $Method::Generate::Accessor::CurrentAttribute = {
21 init_arg => undef(),
22 name => "metaschema_uri",
23 step => "coercion",
24 };
251413µs (my $_return),
26 (my $_error), (my $_old_error = $@);
27147µs (eval {
281441µs14941µs ($@ = $_old_error),
# spent 941µs making 14 calls to JSON::Schema::Modern::Document::__ANON__[JSON/Schema/Modern/Document.pm:45], avg 67µs/call
29 ($_return =
30$coerce_for_metaschema_5furi->($_[1])),
31 1
32 } or
33 $_error = CORE::ref $@ ? $@ : "coercion for \"metaschema_uri\" failed: ".$@);
34145µs ($@ = $_old_error),
35 (defined $_error and CORE::die $_error);
361416µs $_return;
37}
38;
3930196µs3069µs
# spent 20µs (8+12) within Method::Generate::Accessor::_Generated::BEGIN@39.120 which was called: # once (8µs+12µs) by Sub::Quote::_clean_eval at line 39
(do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[Mojo::URL]))) or Type::Tiny::_failed_check($isa_check_for_metaschema_5furi, "InstanceOf[\"Mojo::URL\"]", $value, "attribute_name","metaschema_uri","attribute_step","isa check","mgaca","0","varname","\$self->{\"metaschema_uri\"}"); $value }),
# spent 26µs making 14 calls to UNIVERSAL::isa, avg 2µs/call # spent 20µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@39.120 # spent 12µs making 1 call to warnings::unimport # spent 11µs making 14 calls to Scalar::Util::blessed, avg 786ns/call
40 ($_[0]->{"metaschema_uri"} = $value),
411417µs ($_[0]->{"metaschema_uri"}),
42} }
4311µs $$_UNQUOTED = \&_set_metaschema_uri;
44}
4514µs1;
46
47;